home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 August: Tool Chest / Dev.CD Aug 95 TC / Dev.CD Aug 95 TC.toast / Tool Chest / Interfaces / UniversalInterfaces 2.0 / PInterfaces / CMComponent.p < prev    next >
Encoding:
Text File  |  1995-04-18  |  4.4 KB  |  158 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        CMComponent.p
  3.  
  4.      Contains:    Color Matching Component Interfaces.
  5.  
  6.      Version:    Technology:    Color Sync 1.0.5
  7.                  Package:    Universal Interfaces 2.0 in “MPW Latest” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs@applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. }
  19.  
  20. {$IFC UNDEFINED UsingIncludes}
  21. {$SETC UsingIncludes := 0}
  22. {$ENDC}
  23.  
  24. {$IFC NOT UsingIncludes}
  25.  UNIT CMComponent;
  26.  INTERFACE
  27. {$ENDC}
  28.  
  29. {$IFC UNDEFINED __CMCOMPONENT__}
  30. {$SETC __CMCOMPONENT__ := 1}
  31.  
  32. {$I+}
  33. {$SETC CMComponentIncludes := UsingIncludes}
  34. {$SETC UsingIncludes := 1}
  35.  
  36.  
  37. {$IFC UNDEFINED __TYPES__}
  38. {$I Types.p}
  39. {$ENDC}
  40. {    ConditionalMacros.p                                            }
  41.  
  42. {$IFC UNDEFINED __QUICKDRAW__}
  43. {$I Quickdraw.p}
  44. {$ENDC}
  45. {    MixedMode.p                                                    }
  46. {    QuickdrawText.p                                                }
  47.  
  48. {$IFC UNDEFINED __COMPONENTS__}
  49. {$I Components.p}
  50. {$ENDC}
  51.  
  52. {$IFC UNDEFINED __WINDOWS__}
  53. {$I Windows.p}
  54. {$ENDC}
  55. {    Memory.p                                                    }
  56. {    Events.p                                                    }
  57. {        OSUtils.p                                                }
  58. {    Controls.p                                                    }
  59. {        Menus.p                                                    }
  60.  
  61. {$IFC UNDEFINED __CMAPPLICATION__}
  62. {$I CMApplication.p}
  63. {$ENDC}
  64. {    Printing.p                                                    }
  65. {        Errors.p                                                }
  66. {        Dialogs.p                                                }
  67. {            TextEdit.p                                            }
  68.  
  69. {$PUSH}
  70. {$ALIGN MAC68K}
  71. {$LibExport+}
  72.  
  73. CONST
  74.     CMInterfaceVersion            = 0;
  75.  
  76. { CMM Component function selectors }
  77.     kCMInit                        = 0;
  78.     kCMMatchColors                = 1;
  79.     kCMGamutTest                = 2;
  80.     kCMMatchPixMap                = 3;
  81.     kCMCheckPixMap                = 4;
  82.     kCMConcatenateProfiles        = 5;
  83.  
  84. { Profile Responder Components }
  85.     ProfileResponderInterfaceRev = 0;
  86.  
  87. { ProfileResponder Component function selectors }
  88.     kCMGetProfile                = 0;
  89.     kCMSetProfile                = 1;
  90.     kCMSetProfileDescription    = 2;
  91.     kCMGetIndexedProfile        = 3;
  92.     kCMDeleteDeviceProfile        = 4;
  93.     kProfileResponderMaxSelector = kCMDeleteDeviceProfile;
  94.  
  95.     
  96. TYPE
  97.     ProfileResponder = ComponentInstance;
  98.  
  99. { Required CMM Component routines }
  100.  
  101. FUNCTION CMInit(CMSession: ComponentInstance; srcProfile: CMProfileHandle; dstProfile: CMProfileHandle): CMError;
  102.     {$IFC NOT GENERATINGCFM}
  103.     INLINE $2F3C, $0008, 0, $7000, $A82A;
  104.     {$ENDC}
  105. FUNCTION CMMatchColors(CMSession: ComponentInstance; myColors: CMColorList; count: LONGINT): CMError;
  106.     {$IFC NOT GENERATINGCFM}
  107.     INLINE $2F3C, $0008, 1, $7000, $A82A;
  108.     {$ENDC}
  109. FUNCTION CMCheckColors(CMSession: ComponentInstance; myColors: CMColorList; count: LONGINT; result: CMGamutResult): CMError;
  110.     {$IFC NOT GENERATINGCFM}
  111.     INLINE $2F3C, $000C, 2, $7000, $A82A;
  112.     {$ENDC}
  113. { Optional CMM Component routines }
  114. FUNCTION CMMatchPixMap(CMSession: ComponentInstance; VAR myPixMap: PixMap; progressProc: PixMapCallBackUPP; refCon: LONGINT): CMError;
  115.     {$IFC NOT GENERATINGCFM}
  116.     INLINE $2F3C, $000c, 3, $7000, $A82A;
  117.     {$ENDC}
  118. FUNCTION CMCheckPixMap(CMSession: ComponentInstance; VAR myPixMap: PixMap; progressProc: PixMapCallBackUPP; VAR myBitMap: BitMap; refCon: LONGINT): CMError;
  119.     {$IFC NOT GENERATINGCFM}
  120.     INLINE $2F3C, $0010, 4, $7000, $A82A;
  121.     {$ENDC}
  122. FUNCTION CMConcatenateProfiles(CMSession: ComponentInstance; thru: CMProfileHandle; dst: CMProfileHandle; VAR newDst: CMProfileHandle): CMError;
  123.     {$IFC NOT GENERATINGCFM}
  124.     INLINE $2F3C, $000C, 5, $7000, $A82A;
  125.     {$ENDC}
  126. { ProfileResponder Component routines }
  127. FUNCTION CMGetProfile(myProfileResponder: ProfileResponder; aProfile: CMProfileHandle; VAR returnedProfile: CMProfileHandle): CMError;
  128.     {$IFC NOT GENERATINGCFM}
  129.     INLINE $2F3C, $0008, 0, $7000, $A82A;
  130.     {$ENDC}
  131. FUNCTION CMSetProfile(myProfileResponder: ProfileResponder; newProfile: CMProfileHandle): CMError;
  132.     {$IFC NOT GENERATINGCFM}
  133.     INLINE $2F3C, $0004, 1, $7000, $A82A;
  134.     {$ENDC}
  135. FUNCTION CMSetProfileDescription(myProfileResponder: ProfileResponder; DeviceData: LONGINT; hProfile: CMProfileHandle): CMError;
  136.     {$IFC NOT GENERATINGCFM}
  137.     INLINE $2F3C, $0008, 2, $7000, $A82A;
  138.     {$ENDC}
  139. FUNCTION CMGetIndexedProfile(myProfileResponder: ProfileResponder; search: CMProfileSearchRecordHandle; VAR returnProfile: CMProfileHandle; VAR index: LONGINT): CMError;
  140.     {$IFC NOT GENERATINGCFM}
  141.     INLINE $2F3C, $000C, 3, $7000, $A82A;
  142.     {$ENDC}
  143. FUNCTION CMDeleteDeviceProfile(myProfileResponder: ProfileResponder; deleteMe: CMProfileHandle): CMError;
  144.     {$IFC NOT GENERATINGCFM}
  145.     INLINE $2F3C, $0004, 4, $7000, $A82A;
  146.     {$ENDC}
  147.  
  148. {$ALIGN RESET}
  149. {$POP}
  150.  
  151. {$SETC UsingIncludes := CMComponentIncludes}
  152.  
  153. {$ENDC} {__CMCOMPONENT__}
  154.  
  155. {$IFC NOT UsingIncludes}
  156.  END.
  157. {$ENDC}
  158.